home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 2 / Amiga Tools 2.iso / tex / macros / source / contrib / supported / feynmf / fmfsampl.mf < prev    next >
Text File  |  1995-03-15  |  25KB  |  1,097 lines
  1. % fmfsampl.mf -- do not edit, generated automatically by fmfman.tex
  2. input feynmf
  3. require_RCS_revision "1.10";
  4. beginchar(1, 15*2.84526pt#, 12*2.84526pt#, 0);
  5. "feynmf: 1";
  6. LaTeX_unitlength:=2.84526pt;
  7. vinit;
  8. pickup pencircle scaled thin;
  9. pickup pencircle scaled thick;
  10. vbottomn(v,4);
  11. vdotn (v, 4);
  12. vlabel ("$v_1$", v1);
  13. vlabel ("$v_2$", v2);
  14. vlabel ("$v_3$", v3);
  15. vlabel ("$v_4$", v4);
  16. draw (bottom_gallery);
  17. vposition;
  18. vdraw;
  19. endchar;
  20. beginchar(2, 15*2.84526pt#, 12*2.84526pt#, 0);
  21. "feynmf: 2";
  22. LaTeX_unitlength:=2.84526pt;
  23. vinit;
  24. pickup pencircle scaled thin;
  25. pickup pencircle scaled thick;
  26. vleftn(v,4);
  27. vdotn (v, 4);
  28. vlabel ("$v_1$", v1);
  29. vlabel ("$v_2$", v2);
  30. vlabel ("$v_3$", v3);
  31. vlabel ("$v_4$", v4);
  32. draw (left_gallery);
  33. vposition;
  34. vdraw;
  35. endchar;
  36. beginchar(3, 15*2.84526pt#, 12*2.84526pt#, 0);
  37. "feynmf: 3";
  38. LaTeX_unitlength:=2.84526pt;
  39. vinit;
  40. pickup pencircle scaled thin;
  41. pickup pencircle scaled thick;
  42. vsurroundn(v,7);
  43. vdotn (v, 7);
  44. vlabel ("$v_1$", v1);
  45. vlabel ("$v_2$", v2);
  46. vlabel ("$v_3$", v3);
  47. vlabel ("$v_4$", v4);
  48. vlabel ("$v_5$", v5);
  49. vlabel ("$v_6$", v6);
  50. vlabel ("$v_7$", v7);
  51. draw (surround_gallery);
  52. vposition;
  53. vdraw;
  54. endchar;
  55. beginchar(4, 15*2.84526pt#, 12*2.84526pt#, 0);
  56. "feynmf: 4";
  57. LaTeX_unitlength:=2.84526pt;
  58. vinit;
  59. pickup pencircle scaled thin;
  60. pickup pencircle scaled thick;
  61. vtopn(v,4);
  62. vdotn (v, 4);
  63. vlabel ("$v_1$", v1);
  64. vlabel ("$v_2$", v2);
  65. vlabel ("$v_3$", v3);
  66. vlabel ("$v_4$", v4);
  67. draw (top_gallery);
  68. vposition;
  69. vdraw;
  70. endchar;
  71. beginchar(5, 15*2.84526pt#, 12*2.84526pt#, 0);
  72. "feynmf: 5";
  73. LaTeX_unitlength:=2.84526pt;
  74. vinit;
  75. pickup pencircle scaled thin;
  76. pickup pencircle scaled thick;
  77. vrightn(v,4);
  78. vdotn (v, 4);
  79. vlabel ("$v_1$", v1);
  80. vlabel ("$v_2$", v2);
  81. vlabel ("$v_3$", v3);
  82. vlabel ("$v_4$", v4);
  83. draw (right_gallery);
  84. vposition;
  85. vdraw;
  86. endchar;
  87. beginchar(6, 30*2.84526pt#, 4*2.84526pt#, 0);
  88. "feynmf: 6";
  89. LaTeX_unitlength:=2.84526pt;
  90. vinit;
  91. pickup pencircle scaled thin;
  92. vleft(i1,i2);
  93. vright(o1,o2);
  94. vconnect ("curly", i1,o1);
  95. vposition;
  96. vdraw;
  97. endchar;
  98. beginchar(7, 30*2.84526pt#, 4*2.84526pt#, 0);
  99. "feynmf: 7";
  100. LaTeX_unitlength:=2.84526pt;
  101. vinit;
  102. pickup pencircle scaled thin;
  103. vleft(i1,i2);
  104. vright(o1,o2);
  105. vconnect ("dbl_curly", i1,o1);
  106. vposition;
  107. vdraw;
  108. endchar;
  109. beginchar(8, 30*2.84526pt#, 4*2.84526pt#, 0);
  110. "feynmf: 8";
  111. LaTeX_unitlength:=2.84526pt;
  112. vinit;
  113. pickup pencircle scaled thin;
  114. vleft(i1,i2);
  115. vright(o1,o2);
  116. vconnect ("dashes", i1,o1);
  117. vposition;
  118. vdraw;
  119. endchar;
  120. beginchar(9, 30*2.84526pt#, 4*2.84526pt#, 0);
  121. "feynmf: 9";
  122. LaTeX_unitlength:=2.84526pt;
  123. vinit;
  124. pickup pencircle scaled thin;
  125. vleft(i1,i2);
  126. vright(o1,o2);
  127. vconnect ("dashes_arrow", i1,o1);
  128. vposition;
  129. vdraw;
  130. endchar;
  131. beginchar(10, 30*2.84526pt#, 4*2.84526pt#, 0);
  132. "feynmf: 10";
  133. LaTeX_unitlength:=2.84526pt;
  134. vinit;
  135. pickup pencircle scaled thin;
  136. vleft(i1,i2);
  137. vright(o1,o2);
  138. vconnect ("dbl_dashes", i1,o1);
  139. vposition;
  140. vdraw;
  141. endchar;
  142. beginchar(11, 30*2.84526pt#, 4*2.84526pt#, 0);
  143. "feynmf: 11";
  144. LaTeX_unitlength:=2.84526pt;
  145. vinit;
  146. pickup pencircle scaled thin;
  147. vleft(i1,i2);
  148. vright(o1,o2);
  149. vconnect ("dbl_dashes_arrow", i1,o1);
  150. vposition;
  151. vdraw;
  152. endchar;
  153. beginchar(12, 30*2.84526pt#, 4*2.84526pt#, 0);
  154. "feynmf: 12";
  155. LaTeX_unitlength:=2.84526pt;
  156. vinit;
  157. pickup pencircle scaled thin;
  158. vleft(i1,i2);
  159. vright(o1,o2);
  160. vconnect ("dots", i1,o1);
  161. vposition;
  162. vdraw;
  163. endchar;
  164. beginchar(13, 30*2.84526pt#, 4*2.84526pt#, 0);
  165. "feynmf: 13";
  166. LaTeX_unitlength:=2.84526pt;
  167. vinit;
  168. pickup pencircle scaled thin;
  169. vleft(i1,i2);
  170. vright(o1,o2);
  171. vconnect ("dots_arrow", i1,o1);
  172. vposition;
  173. vdraw;
  174. endchar;
  175. beginchar(14, 30*2.84526pt#, 4*2.84526pt#, 0);
  176. "feynmf: 14";
  177. LaTeX_unitlength:=2.84526pt;
  178. vinit;
  179. pickup pencircle scaled thin;
  180. vleft(i1,i2);
  181. vright(o1,o2);
  182. vconnect ("dbl_dots", i1,o1);
  183. vposition;
  184. vdraw;
  185. endchar;
  186. beginchar(15, 30*2.84526pt#, 4*2.84526pt#, 0);
  187. "feynmf: 15";
  188. LaTeX_unitlength:=2.84526pt;
  189. vinit;
  190. pickup pencircle scaled thin;
  191. vleft(i1,i2);
  192. vright(o1,o2);
  193. vconnect ("dbl_dots_arrow", i1,o1);
  194. vposition;
  195. vdraw;
  196. endchar;
  197. beginchar(16, 30*2.84526pt#, 4*2.84526pt#, 0);
  198. "feynmf: 16";
  199. LaTeX_unitlength:=2.84526pt;
  200. vinit;
  201. pickup pencircle scaled thin;
  202. vleft(i1,i2);
  203. vright(o1,o2);
  204. vconnect ("phantom", i1,o1);
  205. vposition;
  206. vdraw;
  207. endchar;
  208. beginchar(17, 30*2.84526pt#, 4*2.84526pt#, 0);
  209. "feynmf: 17";
  210. LaTeX_unitlength:=2.84526pt;
  211. vinit;
  212. pickup pencircle scaled thin;
  213. vleft(i1,i2);
  214. vright(o1,o2);
  215. vconnect ("phantom_arrow", i1,o1);
  216. vposition;
  217. vdraw;
  218. endchar;
  219. beginchar(18, 30*2.84526pt#, 4*2.84526pt#, 0);
  220. "feynmf: 18";
  221. LaTeX_unitlength:=2.84526pt;
  222. vinit;
  223. pickup pencircle scaled thin;
  224. vleft(i1,i2);
  225. vright(o1,o2);
  226. vconnect ("plain", i1,o1);
  227. vposition;
  228. vdraw;
  229. endchar;
  230. beginchar(19, 30*2.84526pt#, 4*2.84526pt#, 0);
  231. "feynmf: 19";
  232. LaTeX_unitlength:=2.84526pt;
  233. vinit;
  234. pickup pencircle scaled thin;
  235. vleft(i1,i2);
  236. vright(o1,o2);
  237. vconnect ("plain_arrow", i1,o1);
  238. vposition;
  239. vdraw;
  240. endchar;
  241. beginchar(20, 30*2.84526pt#, 4*2.84526pt#, 0);
  242. "feynmf: 20";
  243. LaTeX_unitlength:=2.84526pt;
  244. vinit;
  245. pickup pencircle scaled thin;
  246. vleft(i1,i2);
  247. vright(o1,o2);
  248. vconnect ("dbl_plain", i1,o1);
  249. vposition;
  250. vdraw;
  251. endchar;
  252. beginchar(21, 30*2.84526pt#, 4*2.84526pt#, 0);
  253. "feynmf: 21";
  254. LaTeX_unitlength:=2.84526pt;
  255. vinit;
  256. pickup pencircle scaled thin;
  257. vleft(i1,i2);
  258. vright(o1,o2);
  259. vconnect ("dbl_plain_arrow", i1,o1);
  260. vposition;
  261. vdraw;
  262. endchar;
  263. beginchar(22, 30*2.84526pt#, 4*2.84526pt#, 0);
  264. "feynmf: 22";
  265. LaTeX_unitlength:=2.84526pt;
  266. vinit;
  267. pickup pencircle scaled thin;
  268. vleft(i1,i2);
  269. vright(o1,o2);
  270. vconnect ("wiggly", i1,o1);
  271. vposition;
  272. vdraw;
  273. endchar;
  274. beginchar(23, 30*2.84526pt#, 4*2.84526pt#, 0);
  275. "feynmf: 23";
  276. LaTeX_unitlength:=2.84526pt;
  277. vinit;
  278. pickup pencircle scaled thin;
  279. vleft(i1,i2);
  280. vright(o1,o2);
  281. vconnect ("dbl_wiggly", i1,o1);
  282. vposition;
  283. vdraw;
  284. endchar;
  285. beginchar(24, 8*2.84526pt#, 8*2.84526pt#, 0);
  286. "feynmf: 24";
  287. LaTeX_unitlength:=2.84526pt;
  288. vinit;
  289. pickup pencircle scaled thin;
  290. vforce (((.5w,.4h)),c);
  291. vvertex ("d.shape=circle,d.filled=-.5", c);
  292. vposition;
  293. vdraw;
  294. endchar;
  295. beginchar(25, 8*2.84526pt#, 8*2.84526pt#, 0);
  296. "feynmf: 25";
  297. LaTeX_unitlength:=2.84526pt;
  298. vinit;
  299. pickup pencircle scaled thin;
  300. vforce (((.5w,.4h)),c);
  301. vvertex ("d.shape=circle,d.filled=0", c);
  302. vposition;
  303. vdraw;
  304. endchar;
  305. beginchar(26, 8*2.84526pt#, 8*2.84526pt#, 0);
  306. "feynmf: 26";
  307. LaTeX_unitlength:=2.84526pt;
  308. vinit;
  309. pickup pencircle scaled thin;
  310. vforce (((.5w,.4h)),c);
  311. vvertex ("d.shape=circle,d.filled=.5", c);
  312. vposition;
  313. vdraw;
  314. endchar;
  315. beginchar(27, 8*2.84526pt#, 8*2.84526pt#, 0);
  316. "feynmf: 27";
  317. LaTeX_unitlength:=2.84526pt;
  318. vinit;
  319. pickup pencircle scaled thin;
  320. vforce (((.5w,.4h)),c);
  321. vvertex ("d.shape=circle,d.filled=1", c);
  322. vposition;
  323. vdraw;
  324. endchar;
  325. beginchar(28, 8*2.84526pt#, 8*2.84526pt#, 0);
  326. "feynmf: 28";
  327. LaTeX_unitlength:=2.84526pt;
  328. vinit;
  329. pickup pencircle scaled thin;
  330. vforce (((.5w,.4h)),c);
  331. vvertex ("d.shape=square,d.filled=-.5", c);
  332. vposition;
  333. vdraw;
  334. endchar;
  335. beginchar(29, 8*2.84526pt#, 8*2.84526pt#, 0);
  336. "feynmf: 29";
  337. LaTeX_unitlength:=2.84526pt;
  338. vinit;
  339. pickup pencircle scaled thin;
  340. vforce (((.5w,.4h)),c);
  341. vvertex ("d.shape=square,d.filled=0", c);
  342. vposition;
  343. vdraw;
  344. endchar;
  345. beginchar(30, 8*2.84526pt#, 8*2.84526pt#, 0);
  346. "feynmf: 30";
  347. LaTeX_unitlength:=2.84526pt;
  348. vinit;
  349. pickup pencircle scaled thin;
  350. vforce (((.5w,.4h)),c);
  351. vvertex ("d.shape=square,d.filled=.5", c);
  352. vposition;
  353. vdraw;
  354. endchar;
  355. beginchar(31, 8*2.84526pt#, 8*2.84526pt#, 0);
  356. "feynmf: 31";
  357. LaTeX_unitlength:=2.84526pt;
  358. vinit;
  359. pickup pencircle scaled thin;
  360. vforce (((.5w,.4h)),c);
  361. vvertex ("d.shape=square,d.filled=1", c);
  362. vposition;
  363. vdraw;
  364. endchar;
  365. beginchar(32, 8*2.84526pt#, 8*2.84526pt#, 0);
  366. "feynmf: 32";
  367. LaTeX_unitlength:=2.84526pt;
  368. vinit;
  369. pickup pencircle scaled thin;
  370. vforce (((.5w,.4h)),c);
  371. vvertex ("d.shape=triangle,d.filled=-.5", c);
  372. vposition;
  373. vdraw;
  374. endchar;
  375. beginchar(33, 8*2.84526pt#, 8*2.84526pt#, 0);
  376. "feynmf: 33";
  377. LaTeX_unitlength:=2.84526pt;
  378. vinit;
  379. pickup pencircle scaled thin;
  380. vforce (((.5w,.4h)),c);
  381. vvertex ("d.shape=triangle,d.filled=0", c);
  382. vposition;
  383. vdraw;
  384. endchar;
  385. beginchar(34, 8*2.84526pt#, 8*2.84526pt#, 0);
  386. "feynmf: 34";
  387. LaTeX_unitlength:=2.84526pt;
  388. vinit;
  389. pickup pencircle scaled thin;
  390. vforce (((.5w,.4h)),c);
  391. vvertex ("d.shape=triangle,d.filled=.5", c);
  392. vposition;
  393. vdraw;
  394. endchar;
  395. beginchar(35, 8*2.84526pt#, 8*2.84526pt#, 0);
  396. "feynmf: 35";
  397. LaTeX_unitlength:=2.84526pt;
  398. vinit;
  399. pickup pencircle scaled thin;
  400. vforce (((.5w,.4h)),c);
  401. vvertex ("d.shape=triangle,d.filled=1", c);
  402. vposition;
  403. vdraw;
  404. endchar;
  405. beginchar(36, 8*2.84526pt#, 8*2.84526pt#, 0);
  406. "feynmf: 36";
  407. LaTeX_unitlength:=2.84526pt;
  408. vinit;
  409. pickup pencircle scaled thin;
  410. vforce (((.5w,.4h)),c);
  411. vvertex ("d.shape=diamond,d.filled=-.5", c);
  412. vposition;
  413. vdraw;
  414. endchar;
  415. beginchar(37, 8*2.84526pt#, 8*2.84526pt#, 0);
  416. "feynmf: 37";
  417. LaTeX_unitlength:=2.84526pt;
  418. vinit;
  419. pickup pencircle scaled thin;
  420. vforce (((.5w,.4h)),c);
  421. vvertex ("d.shape=diamond,d.filled=0", c);
  422. vposition;
  423. vdraw;
  424. endchar;
  425. beginchar(38, 8*2.84526pt#, 8*2.84526pt#, 0);
  426. "feynmf: 38";
  427. LaTeX_unitlength:=2.84526pt;
  428. vinit;
  429. pickup pencircle scaled thin;
  430. vforce (((.5w,.4h)),c);
  431. vvertex ("d.shape=diamond,d.filled=.5", c);
  432. vposition;
  433. vdraw;
  434. endchar;
  435. beginchar(39, 8*2.84526pt#, 8*2.84526pt#, 0);
  436. "feynmf: 39";
  437. LaTeX_unitlength:=2.84526pt;
  438. vinit;
  439. pickup pencircle scaled thin;
  440. vforce (((.5w,.4h)),c);
  441. vvertex ("d.shape=diamond,d.filled=1", c);
  442. vposition;
  443. vdraw;
  444. endchar;
  445. beginchar(40, 8*2.84526pt#, 8*2.84526pt#, 0);
  446. "feynmf: 40";
  447. LaTeX_unitlength:=2.84526pt;
  448. vinit;
  449. pickup pencircle scaled thin;
  450. vforce (((.5w,.4h)),c);
  451. vvertex ("d.shape=pentagon,d.filled=-.5", c);
  452. vposition;
  453. vdraw;
  454. endchar;
  455. beginchar(41, 8*2.84526pt#, 8*2.84526pt#, 0);
  456. "feynmf: 41";
  457. LaTeX_unitlength:=2.84526pt;
  458. vinit;
  459. pickup pencircle scaled thin;
  460. vforce (((.5w,.4h)),c);
  461. vvertex ("d.shape=pentagon,d.filled=0", c);
  462. vposition;
  463. vdraw;
  464. endchar;
  465. beginchar(42, 8*2.84526pt#, 8*2.84526pt#, 0);
  466. "feynmf: 42";
  467. LaTeX_unitlength:=2.84526pt;
  468. vinit;
  469. pickup pencircle scaled thin;
  470. vforce (((.5w,.4h)),c);
  471. vvertex ("d.shape=pentagon,d.filled=.5", c);
  472. vposition;
  473. vdraw;
  474. endchar;
  475. beginchar(43, 8*2.84526pt#, 8*2.84526pt#, 0);
  476. "feynmf: 43";
  477. LaTeX_unitlength:=2.84526pt;
  478. vinit;
  479. pickup pencircle scaled thin;
  480. vforce (((.5w,.4h)),c);
  481. vvertex ("d.shape=pentagon,d.filled=1", c);
  482. vposition;
  483. vdraw;
  484. endchar;
  485. beginchar(44, 8*2.84526pt#, 8*2.84526pt#, 0);
  486. "feynmf: 44";
  487. LaTeX_unitlength:=2.84526pt;
  488. vinit;
  489. pickup pencircle scaled thin;
  490. vforce (((.5w,.4h)),c);
  491. vvertex ("d.shape=hexagon,d.filled=-.5", c);
  492. vposition;
  493. vdraw;
  494. endchar;
  495. beginchar(45, 8*2.84526pt#, 8*2.84526pt#, 0);
  496. "feynmf: 45";
  497. LaTeX_unitlength:=2.84526pt;
  498. vinit;
  499. pickup pencircle scaled thin;
  500. vforce (((.5w,.4h)),c);
  501. vvertex ("d.shape=hexagon,d.filled=0", c);
  502. vposition;
  503. vdraw;
  504. endchar;
  505. beginchar(46, 8*2.84526pt#, 8*2.84526pt#, 0);
  506. "feynmf: 46";
  507. LaTeX_unitlength:=2.84526pt;
  508. vinit;
  509. pickup pencircle scaled thin;
  510. vforce (((.5w,.4h)),c);
  511. vvertex ("d.shape=hexagon,d.filled=.5", c);
  512. vposition;
  513. vdraw;
  514. endchar;
  515. beginchar(47, 8*2.84526pt#, 8*2.84526pt#, 0);
  516. "feynmf: 47";
  517. LaTeX_unitlength:=2.84526pt;
  518. vinit;
  519. pickup pencircle scaled thin;
  520. vforce (((.5w,.4h)),c);
  521. vvertex ("d.shape=hexagon,d.filled=1", c);
  522. vposition;
  523. vdraw;
  524. endchar;
  525. beginchar(48, 8*2.84526pt#, 8*2.84526pt#, 0);
  526. "feynmf: 48";
  527. LaTeX_unitlength:=2.84526pt;
  528. vinit;
  529. pickup pencircle scaled thin;
  530. vforce (((.5w,.4h)),c);
  531. vvertex ("d.shape=triagram,d.filled=-.5", c);
  532. vposition;
  533. vdraw;
  534. endchar;
  535. beginchar(49, 8*2.84526pt#, 8*2.84526pt#, 0);
  536. "feynmf: 49";
  537. LaTeX_unitlength:=2.84526pt;
  538. vinit;
  539. pickup pencircle scaled thin;
  540. vforce (((.5w,.4h)),c);
  541. vvertex ("d.shape=triagram,d.filled=0", c);
  542. vposition;
  543. vdraw;
  544. endchar;
  545. beginchar(50, 8*2.84526pt#, 8*2.84526pt#, 0);
  546. "feynmf: 50";
  547. LaTeX_unitlength:=2.84526pt;
  548. vinit;
  549. pickup pencircle scaled thin;
  550. vforce (((.5w,.4h)),c);
  551. vvertex ("d.shape=triagram,d.filled=.5", c);
  552. vposition;
  553. vdraw;
  554. endchar;
  555. beginchar(51, 8*2.84526pt#, 8*2.84526pt#, 0);
  556. "feynmf: 51";
  557. LaTeX_unitlength:=2.84526pt;
  558. vinit;
  559. pickup pencircle scaled thin;
  560. vforce (((.5w,.4h)),c);
  561. vvertex ("d.shape=triagram,d.filled=1", c);
  562. vposition;
  563. vdraw;
  564. endchar;
  565. beginchar(52, 8*2.84526pt#, 8*2.84526pt#, 0);
  566. "feynmf: 52";
  567. LaTeX_unitlength:=2.84526pt;
  568. vinit;
  569. pickup pencircle scaled thin;
  570. vforce (((.5w,.4h)),c);
  571. vvertex ("d.shape=tetragram,d.filled=-.5", c);
  572. vposition;
  573. vdraw;
  574. endchar;
  575. beginchar(53, 8*2.84526pt#, 8*2.84526pt#, 0);
  576. "feynmf: 53";
  577. LaTeX_unitlength:=2.84526pt;
  578. vinit;
  579. pickup pencircle scaled thin;
  580. vforce (((.5w,.4h)),c);
  581. vvertex ("d.shape=tetragram,d.filled=0", c);
  582. vposition;
  583. vdraw;
  584. endchar;
  585. beginchar(54, 8*2.84526pt#, 8*2.84526pt#, 0);
  586. "feynmf: 54";
  587. LaTeX_unitlength:=2.84526pt;
  588. vinit;
  589. pickup pencircle scaled thin;
  590. vforce (((.5w,.4h)),c);
  591. vvertex ("d.shape=tetragram,d.filled=.5", c);
  592. vposition;
  593. vdraw;
  594. endchar;
  595. beginchar(55, 8*2.84526pt#, 8*2.84526pt#, 0);
  596. "feynmf: 55";
  597. LaTeX_unitlength:=2.84526pt;
  598. vinit;
  599. pickup pencircle scaled thin;
  600. vforce (((.5w,.4h)),c);
  601. vvertex ("d.shape=tetragram,d.filled=1", c);
  602. vposition;
  603. vdraw;
  604. endchar;
  605. beginchar(56, 8*2.84526pt#, 8*2.84526pt#, 0);
  606. "feynmf: 56";
  607. LaTeX_unitlength:=2.84526pt;
  608. vinit;
  609. pickup pencircle scaled thin;
  610. vforce (((.5w,.4h)),c);
  611. vvertex ("d.shape=pentagram,d.filled=-.5", c);
  612. vposition;
  613. vdraw;
  614. endchar;
  615. beginchar(57, 8*2.84526pt#, 8*2.84526pt#, 0);
  616. "feynmf: 57";
  617. LaTeX_unitlength:=2.84526pt;
  618. vinit;
  619. pickup pencircle scaled thin;
  620. vforce (((.5w,.4h)),c);
  621. vvertex ("d.shape=pentagram,d.filled=0", c);
  622. vposition;
  623. vdraw;
  624. endchar;
  625. beginchar(58, 8*2.84526pt#, 8*2.84526pt#, 0);
  626. "feynmf: 58";
  627. LaTeX_unitlength:=2.84526pt;
  628. vinit;
  629. pickup pencircle scaled thin;
  630. vforce (((.5w,.4h)),c);
  631. vvertex ("d.shape=pentagram,d.filled=.5", c);
  632. vposition;
  633. vdraw;
  634. endchar;
  635. beginchar(59, 8*2.84526pt#, 8*2.84526pt#, 0);
  636. "feynmf: 59";
  637. LaTeX_unitlength:=2.84526pt;
  638. vinit;
  639. pickup pencircle scaled thin;
  640. vforce (((.5w,.4h)),c);
  641. vvertex ("d.shape=pentagram,d.filled=1", c);
  642. vposition;
  643. vdraw;
  644. endchar;
  645. beginchar(60, 8*2.84526pt#, 8*2.84526pt#, 0);
  646. "feynmf: 60";
  647. LaTeX_unitlength:=2.84526pt;
  648. vinit;
  649. pickup pencircle scaled thin;
  650. vforce (((.5w,.4h)),c);
  651. vvertex ("d.shape=hexagram,d.filled=-.5", c);
  652. vposition;
  653. vdraw;
  654. endchar;
  655. beginchar(61, 8*2.84526pt#, 8*2.84526pt#, 0);
  656. "feynmf: 61";
  657. LaTeX_unitlength:=2.84526pt;
  658. vinit;
  659. pickup pencircle scaled thin;
  660. vforce (((.5w,.4h)),c);
  661. vvertex ("d.shape=hexagram,d.filled=0", c);
  662. vposition;
  663. vdraw;
  664. endchar;
  665. beginchar(62, 8*2.84526pt#, 8*2.84526pt#, 0);
  666. "feynmf: 62";
  667. LaTeX_unitlength:=2.84526pt;
  668. vinit;
  669. pickup pencircle scaled thin;
  670. vforce (((.5w,.4h)),c);
  671. vvertex ("d.shape=hexagram,d.filled=.5", c);
  672. vposition;
  673. vdraw;
  674. endchar;
  675. beginchar(63, 8*2.84526pt#, 8*2.84526pt#, 0);
  676. "feynmf: 63";
  677. LaTeX_unitlength:=2.84526pt;
  678. vinit;
  679. pickup pencircle scaled thin;
  680. vforce (((.5w,.4h)),c);
  681. vvertex ("d.shape=hexagram,d.filled=1", c);
  682. vposition;
  683. vdraw;
  684. endchar;
  685. beginchar(64, 40*2.84526pt#, 25*2.84526pt#, 0);
  686. "feynmf: 64";
  687. LaTeX_unitlength:=2.84526pt;
  688. vinit;
  689. pickup pencircle scaled thin;
  690. pickup pencircle scaled thick;
  691. vleft(i1,i2);
  692. vlabel ("$\bar b$", i1);
  693. vlabel ("$d$", i2);
  694. vright(o1,o2);
  695. vlabel ("$\bar d$", o1);
  696. vlabel ("$b$", o2);
  697. vconnect ("fermion", i1,v1);
  698. vconnect ("fermion,label=$\bar t,,\bar c,, \bar u$,l.side=right", v1,v3);
  699. vconnect ("fermion", v3,o1);
  700. vconnect ("fermion", o2,v4);
  701. vconnect ("fermion,label=$t,,c,,u$,l.side=right", v4,v2);
  702. vconnect ("fermion", v2,i2);
  703. vconnect ("photon,label=$W^+$,l.side=left", v1,v2);
  704. vconnect ("photon,label=$W^-$,l.side=right", v3,v4);
  705. vdot (v1,v2,v3,v4);
  706. vposition;
  707. vdraw;
  708. endchar;
  709. beginchar(65, 40*2.84526pt#, 25*2.84526pt#, 0);
  710. "feynmf: 65";
  711. LaTeX_unitlength:=2.84526pt;
  712. vinit;
  713. pickup pencircle scaled thin;
  714. pickup pencircle scaled thick;
  715. vleft(i1,i2);
  716. vright(o1,o2,o3,o4);
  717. vlabel ("$e_-$", i1);
  718. vlabel ("$e_+$", i2);
  719. vconnect ("fermion", i1,v1,i2);
  720. vconnect ("photon", v1,v2);
  721. vblob ((.15w),v2);
  722. vconnect ("photon", v2,v3);
  723. vlabel ("$\mu _+$", o1);
  724. vlabel ("$\nu _{\mu }$", o2);
  725. vconnect ("fermion", o1,v3,o2);
  726. vconnect ("photon", v2,v4);
  727. vlabel ("$\bar c$", o4);
  728. vlabel ("$s$", o3);
  729. vconnect ("fermion", o4,v4,o3);
  730. vposition;
  731. vdraw;
  732. endchar;
  733. beginchar(66, 40*2.84526pt#, 25*2.84526pt#, 0);
  734. "feynmf: 66";
  735. LaTeX_unitlength:=2.84526pt;
  736. vinit;
  737. pickup pencircle scaled thin;
  738. pickup pencircle scaled thick;
  739. vleft(i1,i2);
  740. vright(o1,o2,o3,o4);
  741. vlabel ("$e_-$", i1);
  742. vlabel ("$e_+$", i2);
  743. vconnect ("fermion", i1,v1,v2,i2);
  744. vconnect ("photon", v1,v3);
  745. vlabel ("$\mu _+$", o1);
  746. vlabel ("$\nu _{\mu }$", o2);
  747. vconnect ("fermion", o1,v3,o2);
  748. vconnect ("photon", v2,v4);
  749. vlabel ("$\bar c$", o4);
  750. vlabel ("$s$", o3);
  751. vconnect ("fermion", o4,v4,o3);
  752. vposition;
  753. vdraw;
  754. endchar;
  755. beginchar(67, 40*2.84526pt#, 25*2.84526pt#, 0);
  756. "feynmf: 67";
  757. LaTeX_unitlength:=2.84526pt;
  758. vinit;
  759. pickup pencircle scaled thin;
  760. pickup pencircle scaled thick;
  761. vleft(i1,i2);
  762. vlabel ("$p^{\prime }$", i1);
  763. vlabel ("$p$", i2);
  764. vright(o1);
  765. vlabel ("$p+p^{\prime }$", o1);
  766. vconnect ("fermion,tension=1/3", i1,v1);
  767. vconnect ("plain", v1,v2);
  768. vconnect ("fermion,label=$p-k$,l.side=left", v2,v3);
  769. vconnect ("photon,right,tension=0,label=$k$", v2,v3);
  770. vconnect ("plain", v3,i2);
  771. vconnect ("photon", v1,o1);
  772. vposition;
  773. vdraw;
  774. endchar;
  775. beginchar(68, 40*2.84526pt#, 25*2.84526pt#, 0);
  776. "feynmf: 68";
  777. LaTeX_unitlength:=2.84526pt;
  778. vinit;
  779. pickup pencircle scaled thin;
  780. pickup pencircle scaled thick;
  781. vsurroundn(e,4);
  782. for n = 1 step 1 until 4:
  783. vconnect ("photon", e[n],i[n]);
  784. endfor
  785. vcyclen ("fermion,tension=4/8", i, 4);
  786. vposition;
  787. vdraw;
  788. endchar;
  789. beginchar(69, 40*2.84526pt#, 25*2.84526pt#, 0);
  790. "feynmf: 69";
  791. LaTeX_unitlength:=2.84526pt;
  792. vinit;
  793. pickup pencircle scaled thin;
  794. pickup pencircle scaled thick;
  795. vsurroundn(e,6);
  796. for n = 1 step 1 until 6:
  797. vconnect ("photon", e[n],i[n]);
  798. endfor
  799. vcyclen ("fermion,tension=6/8", i, 6);
  800. vposition;
  801. vdraw;
  802. endchar;
  803. beginchar(70, 40*2.84526pt#, 25*2.84526pt#, 0);
  804. "feynmf: 70";
  805. LaTeX_unitlength:=2.84526pt;
  806. vinit;
  807. pickup pencircle scaled thin;
  808. pickup pencircle scaled thick;
  809. vsurroundn(e,8);
  810. for n = 1 step 1 until 8:
  811. vconnect ("photon", e[n],i[n]);
  812. endfor
  813. vcyclen ("fermion,tension=8/8", i, 8);
  814. vposition;
  815. vdraw;
  816. endchar;
  817. beginchar(71, 40*2.84526pt#, 25*2.84526pt#, 0);
  818. "feynmf: 71";
  819. LaTeX_unitlength:=2.84526pt;
  820. vinit;
  821. pickup pencircle scaled thin;
  822. pickup pencircle scaled thick;
  823. vsurroundn(e,10);
  824. for n = 1 step 1 until 10:
  825. vconnect ("photon", e[n],i[n]);
  826. endfor
  827. vcyclen ("fermion,tension=10/8", i, 10);
  828. vposition;
  829. vdraw;
  830. endchar;
  831. beginchar(72, 20*2.84526pt#, 20*2.84526pt#, 0);
  832. "feynmf: 72";
  833. LaTeX_unitlength:=2.84526pt;
  834. vinit;
  835. pickup pencircle scaled thin;
  836. vsurroundn(v,3);
  837. vdotn (v, 3);
  838. vcyclen ("fermion,right=0.25", v, 3);
  839. vcyclen ("fermion,left=0.25", v, 3);
  840. vposition;
  841. vdraw;
  842. endchar;
  843. beginchar(73, 20*2.84526pt#, 20*2.84526pt#, 0);
  844. "feynmf: 73";
  845. LaTeX_unitlength:=2.84526pt;
  846. vinit;
  847. pickup pencircle scaled thin;
  848. vsurroundn(v,4);
  849. vdotn (v, 4);
  850. vcyclen ("fermion,right=0.25", v, 4);
  851. vcyclen ("fermion,left=0.25", v, 4);
  852. vposition;
  853. vdraw;
  854. endchar;
  855. beginchar(74, 20*2.84526pt#, 20*2.84526pt#, 0);
  856. "feynmf: 74";
  857. LaTeX_unitlength:=2.84526pt;
  858. vinit;
  859. pickup pencircle scaled thin;
  860. vsurroundn(v,5);
  861. vdotn (v, 5);
  862. vcyclen ("fermion,right=0.25", v, 5);
  863. vcyclen ("fermion,left=0.25", v, 5);
  864. vposition;
  865. vdraw;
  866. endchar;
  867. beginchar(75, 20*2.84526pt#, 20*2.84526pt#, 0);
  868. "feynmf: 75";
  869. LaTeX_unitlength:=2.84526pt;
  870. vinit;
  871. pickup pencircle scaled thin;
  872. vsurroundn(v,6);
  873. vdotn (v, 6);
  874. vcyclen ("fermion,right=0.25", v, 6);
  875. vcyclen ("fermion,left=0.25", v, 6);
  876. vposition;
  877. vdraw;
  878. endchar;
  879. beginchar(76, 20*2.84526pt#, 20*2.84526pt#, 0);
  880. "feynmf: 76";
  881. LaTeX_unitlength:=2.84526pt;
  882. vinit;
  883. pickup pencircle scaled thin;
  884. vsurroundn(v,3);
  885. vdotn (v, 3);
  886. vcyclen ("fermion,right=0.25", v, 3);
  887. vrcyclen ("fermion,right=0.25", v, 3);
  888. vposition;
  889. vdraw;
  890. endchar;
  891. beginchar(77, 20*2.84526pt#, 20*2.84526pt#, 0);
  892. "feynmf: 77";
  893. LaTeX_unitlength:=2.84526pt;
  894. vinit;
  895. pickup pencircle scaled thin;
  896. vsurroundn(v,4);
  897. vdotn (v, 4);
  898. vcyclen ("fermion,right=0.25", v, 4);
  899. vrcyclen ("fermion,right=0.25", v, 4);
  900. vposition;
  901. vdraw;
  902. endchar;
  903. beginchar(78, 20*2.84526pt#, 20*2.84526pt#, 0);
  904. "feynmf: 78";
  905. LaTeX_unitlength:=2.84526pt;
  906. vinit;
  907. pickup pencircle scaled thin;
  908. vsurroundn(v,5);
  909. vdotn (v, 5);
  910. vcyclen ("fermion,right=0.25", v, 5);
  911. vrcyclen ("fermion,right=0.25", v, 5);
  912. vposition;
  913. vdraw;
  914. endchar;
  915. beginchar(79, 20*2.84526pt#, 20*2.84526pt#, 0);
  916. "feynmf: 79";
  917. LaTeX_unitlength:=2.84526pt;
  918. vinit;
  919. pickup pencircle scaled thin;
  920. vsurroundn(v,6);
  921. vdotn (v, 6);
  922. vcyclen ("fermion,right=0.25", v, 6);
  923. vrcyclen ("fermion,right=0.25", v, 6);
  924. vposition;
  925. vdraw;
  926. endchar;
  927. beginchar(80, 40*2.84526pt#, 25*2.84526pt#, 0);
  928. "feynmf: 80";
  929. LaTeX_unitlength:=2.84526pt;
  930. vinit;
  931. pickup pencircle scaled thin;
  932. pickup pencircle scaled thick;
  933. vleft(ip,il);
  934. vright(oq1,oq2,d1,oq3,d2,d3,ol);
  935. vconnect ("fermion", ip,vp,vq,oq3);
  936. vconnect ("fermion", vp,oq1);
  937. vconnect ("fermion", vp,oq2);
  938. vconnect ("photon", vl,vq);
  939. vconnect ("fermion", il,vl,ol);
  940. vposition;
  941. vforce ((vloc ip+(0,2thick)),ipp);
  942. vforce ((vloc ip-(0,2thick)),ipm);
  943. vforce ((vloc vp+(0,2thick)),vpp);
  944. vforce ((vloc vp-(0,2thick)),vpm);
  945. vshift((0.12 (vloc ip - vloc vp)),vpp);
  946. vshift((0.10 (vloc ip - vloc vp)),vpm);
  947. vconnect ("plain", ipp,vpp);
  948. vconnect ("plain", ipm,vpm);
  949. vblob ((.15w),vp);
  950. vdot (vq);
  951. vposition;
  952. vdraw;
  953. endchar;
  954. beginchar(81, 40*2.84526pt#, 25*2.84526pt#, 0);
  955. "feynmf: 81";
  956. LaTeX_unitlength:=2.84526pt;
  957. vinit;
  958. pickup pencircle scaled thin;
  959. pickup pencircle scaled thick;
  960. vleft(ip,il);
  961. vright(oq1,oq2,d1,oq3,d2,d3,ol);
  962. vconnect ("fermion", ip,vp,vq,oq3);
  963. vconnect ("phantom", ip,vp);
  964. vconnect ("fermion", vp,oq1);
  965. vconnect ("fermion", vp,oq2);
  966. vconnect ("photon", vl,vq);
  967. vconnect ("fermion", il,vl,ol);
  968. vconnect ("phantom", il,vl);
  969. vposition;
  970. vforce ((vloc ip+(0,2thick)),ipp);
  971. vforce ((vloc ip-(0,2thick)),ipm);
  972. vforce ((vloc vp+(0,2thick)),vpp);
  973. vforce ((vloc vp-(0,2thick)),vpm);
  974. vshift((0.16 (vloc ip - vloc vp)),vpp);
  975. vshift((0.14 (vloc ip - vloc vp)),vpm);
  976. vconnect ("plain", ipp,vpp);
  977. vconnect ("plain", ipm,vpm);
  978. vblob ((.15w),vp);
  979. vdot (vq);
  980. vposition;
  981. vdraw;
  982. endchar;
  983. beginchar(82, 40*2.84526pt#, 25*2.84526pt#, 0);
  984. "feynmf: 82";
  985. LaTeX_unitlength:=2.84526pt;
  986. vinit;
  987. pickup pencircle scaled thin;
  988. pickup pencircle scaled thick;
  989. vleft(i1);
  990. vright(o1,o2);
  991. vconnect ("photon", v4,i1);
  992. vconnect ("quark", o1,v1,v2,v3,v4,v5,v6,v7,o2);
  993. vconnect ("gluon", v1,v7);
  994. vconnect ("gluon", v2,v6);
  995. vconnect ("gluon", v3,v5);
  996. vposition;
  997. vdraw;
  998. endchar;
  999. beginchar(83, 40*2.84526pt#, 25*2.84526pt#, 0);
  1000. "feynmf: 83";
  1001. LaTeX_unitlength:=2.84526pt;
  1002. vinit;
  1003. pickup pencircle scaled thin;
  1004. pickup pencircle scaled thick;
  1005. vleft(i1);
  1006. vright(o1,o2);
  1007. vconnect ("photon", v4,i1);
  1008. vconnect ("quark", o1,v1,v2,v3,v4,v5,v6,v7,o2);
  1009. vposition;
  1010. vconnect ("gluon", v1,v7);
  1011. vconnect ("gluon", v2,v6);
  1012. vconnect ("gluon", v3,v5);
  1013. vposition;
  1014. vdraw;
  1015. endchar;
  1016. beginchar(84, 40*2.84526pt#, 25*2.84526pt#, 0);
  1017. "feynmf: 84";
  1018. LaTeX_unitlength:=2.84526pt;
  1019. vinit;
  1020. pickup pencircle scaled thin;
  1021. pickup pencircle scaled thick;
  1022. vleft(i1,i2);
  1023. vright(o1,o2,o3,o4);
  1024. vconnect ("fermion", i1,v1,i2);
  1025. vconnect ("photon", v1,v2);
  1026. vconnect ("fermion", o1,v2,v3,o4);
  1027. vconnect ("photon", v3,v4);
  1028. vconnect ("fermion", o3,v4,o2);
  1029. vposition;
  1030. vdraw;
  1031. endchar;
  1032. beginchar(85, 40*2.84526pt#, 25*2.84526pt#, 0);
  1033. "feynmf: 85";
  1034. LaTeX_unitlength:=2.84526pt;
  1035. vinit;
  1036. pickup pencircle scaled thin;
  1037. pickup pencircle scaled thick;
  1038. vleft(i1,i2);
  1039. vright(o1,o2,o3,o4);
  1040. vconnect ("fermion", i1,v1,i2);
  1041. vconnect ("photon", v1,v2);
  1042. vconnect ("fermion", o1,v2,v3,o4);
  1043. vconnect ("photon", v3,v4);
  1044. vconnect ("fermion", o3,v4,o2);
  1045. vposition;
  1046. vshift((-.1w,0),v2,v3,v4);
  1047. vposition;
  1048. vdraw;
  1049. endchar;
  1050. beginchar(86, 40*2.84526pt#, 25*2.84526pt#, 0);
  1051. "feynmf: 86";
  1052. LaTeX_unitlength:=2.84526pt;
  1053. vinit;
  1054. pickup pencircle scaled thin;
  1055. pickup pencircle scaled thick;
  1056. vleft(i1,i2);
  1057. vright(o1,o2,o3,o4);
  1058. vconnect ("fermion", i1,v1,i2);
  1059. vconnect ("photon", v1,v2);
  1060. vconnect ("fermion", o1,v2,v3,o4);
  1061. vposition;
  1062. vconnect ("photon", v3,v4);
  1063. vconnect ("fermion", o3,v4,o2);
  1064. vposition;
  1065. vdraw;
  1066. endchar;
  1067. beginchar(87, 40*2.84526pt#, 40*2.84526pt#, 0);
  1068. "feynmf: 87";
  1069. LaTeX_unitlength:=2.84526pt;
  1070. vinit;
  1071. pickup pencircle scaled thin;
  1072.  pair o,xm,xp,ym,yp; pair v.loc; string v.lbl; o:=(.5w,.1h); xm:=(0,.1h); xp:=(w,.1h); ym:=(.5w,0); yp:=(.5w,h); v.loc := xp; v.lbl := "$x$"; v.lbl.ang := -135; v.lbl.dist := 2; vdraw_vertex_label v; v.loc := yp; v.lbl := "$y=x^2$"; vdraw_vertex_label v; pickup pencircle scaled thin; draw xm--xp; draw ym--yp; pickup pencircle scaled thick; xs:=xpart(xp-o); ys:=ypart(yp-o); draw (o + (-xs,ys)) for n = -9 upto 10: --(o + (xs*(n/10),ys*((n/10)**2))) endfor;
  1073. vposition;
  1074. vdraw;
  1075. endchar;
  1076. beginchar(88, 40*2.84526pt#, 40*2.84526pt#, 0);
  1077. "feynmf: 88";
  1078. LaTeX_unitlength:=2.84526pt;
  1079. vinit;
  1080. pickup pencircle scaled thin;
  1081. draw_gluon (fullcircle scaled .5w shifted (.5w,.5h));
  1082. vposition;
  1083. vdraw;
  1084. endchar;
  1085. beginchar(89, 40*2.84526pt#, 40*2.84526pt#, 0);
  1086. "feynmf: 89";
  1087. LaTeX_unitlength:=2.84526pt;
  1088. vinit;
  1089. pickup pencircle scaled thin;
  1090. draw_gluon (reverse fullcircle scaled .5w shifted (.5w,.5h));
  1091. vposition;
  1092. vdraw;
  1093. endchar;
  1094. % the end.
  1095. end.
  1096. endinput;
  1097.